home *** CD-ROM | disk | FTP | other *** search
/ isnet Internet / Isnet Internet CD.iso / prog / chat / 12 / 12.exe / SYSTEM / ircngui2.mrc < prev    next >
Encoding:
Text File  |  2000-02-21  |  27.2 KB  |  905 lines
  1. alias userprot.update {
  2.   if ($did(3).state) {
  3.     did -e $dname 11
  4.     did -e $dname 31
  5.     did -e $dname 51
  6.     did -e $dname 71
  7.   }
  8.   else {
  9.     did -ub $dname 11
  10.     did -ub $dname 31
  11.     did -ub $dname 51
  12.     did -ub $dname 71
  13.   }
  14.   if ($did(11).state) {
  15.     did -e $dname 10
  16.     did -e $dname 12
  17.     did -e $dname 13
  18.     did -e $dname 14
  19.     did -e $dname 15
  20.     did -e $dname 16
  21.     did -e $dname 17
  22.     did -e $dname 18
  23.     did -e $dname 19
  24.     did -e $dname 20
  25.     did -e $dname 21
  26.     did -e $dname 22
  27.     did -e $dname 23
  28.   }
  29.   else {
  30.     did -b $dname 10
  31.     did -b $dname 12
  32.     did -b $dname 13
  33.     did -b $dname 14
  34.     did -b $dname 15
  35.     did -b $dname 16
  36.     did -b $dname 17
  37.     did -b $dname 18
  38.     did -b $dname 19
  39.     did -b $dname 20
  40.     did -b $dname 21
  41.     did -b $dname 22
  42.     did -b $dname 23
  43.   }
  44.   if ($did(31).state) {
  45.     did -e $dname 30
  46.     did -e $dname 32
  47.     did -e $dname 33
  48.     did -e $dname 34
  49.     did -e $dname 35
  50.     did -e $dname 36
  51.     did -e $dname 37
  52.     did -e $dname 38
  53.     did -e $dname 39
  54.     did -e $dname 40
  55.     did -e $dname 41
  56.     did -e $dname 42
  57.     did -e $dname 43
  58.   }
  59.   else {
  60.     did -b $dname 30
  61.     did -b $dname 32
  62.     did -b $dname 33
  63.     did -b $dname 34
  64.     did -b $dname 35
  65.     did -b $dname 36
  66.     did -b $dname 37
  67.     did -b $dname 38
  68.     did -b $dname 39
  69.     did -b $dname 40
  70.     did -b $dname 41
  71.     did -b $dname 42
  72.     did -b $dname 43
  73.   }
  74.   if ($did(51).state) {
  75.     did -e $dname 50
  76.     did -e $dname 52
  77.     did -e $dname 53
  78.     did -e $dname 54
  79.     did -e $dname 55
  80.     did -e $dname 56
  81.     did -e $dname 57
  82.     did -e $dname 58
  83.     did -e $dname 59
  84.     did -e $dname 60
  85.     did -e $dname 61
  86.     did -e $dname 62
  87.     did -e $dname 63
  88.   }
  89.   else {
  90.     did -b $dname 50
  91.     did -b $dname 52
  92.     did -b $dname 53
  93.     did -b $dname 54
  94.     did -b $dname 55
  95.     did -b $dname 56
  96.     did -b $dname 57
  97.     did -b $dname 58
  98.     did -b $dname 59
  99.     did -b $dname 60
  100.     did -b $dname 61
  101.     did -b $dname 62
  102.     did -b $dname 63
  103.   }
  104.   if ($did(71).state) {
  105.     did -e $dname 70
  106.     did -e $dname 72
  107.     did -e $dname 73
  108.     did -e $dname 74
  109.     did -e $dname 75
  110.     did -e $dname 76
  111.     did -e $dname 77
  112.     did -e $dname 78
  113.     did -e $dname 79
  114.     did -e $dname 80
  115.     did -e $dname 81
  116.     did -e $dname 82
  117.     did -e $dname 83
  118.   }
  119.   else {
  120.     did -b $dname 70
  121.     did -b $dname 72
  122.     did -b $dname 73
  123.     did -b $dname 74
  124.     did -b $dname 75
  125.     did -b $dname 76
  126.     did -b $dname 77
  127.     did -b $dname 78
  128.     did -b $dname 79
  129.     did -b $dname 80
  130.     did -b $dname 81
  131.     did -b $dname 82
  132.     did -b $dname 83
  133.   }
  134.   did -e $dname 4
  135. }
  136. on 1:DIALOG:ircN.usersettings:*:* {
  137.   if ($devent == init) {
  138.     if (%botgetops == on) did -c $dname 11
  139.     if (%opbot == on) did -c $dname 12
  140.     if (%reopbot == on) did -c $dname 13
  141.     if (%botdeop == on) did -c $dname 14
  142.     if (%botautopass == on) did -c $dname 15
  143.     if (%notify == on) did -c $dname 21
  144.     if (%ntwhs == on) did -c $dname 22
  145.     if (%inotify == on) did -c $dname 23
  146.     if (%nsukn == on) did -c $dname 24
  147.     if (%userbans == on) did -c $dname 31
  148.     if (%showchans == on) did -c $dname 32
  149.     if (%info == on) did -c $dname 41
  150.     if (%lb) did -ra $dname 43 %lb
  151.     if (%rb) did -ra $dname 45 %rb
  152.     if (%strictops == on) did -c $dname 51
  153.     if (%strictchans) did -ra $dname 53 %strictchans
  154.     if (%protdeop == on) did -c $dname 54
  155.     usersettings.update
  156.     did -b $dname 3
  157.   }
  158.   elseif ($devent == sclick) {
  159.     if ((($did == 1) && ($did(2).next == 3)) || ($did == 3)) {
  160.       if ($did(11).state) set %botgetops on
  161.       else set %botgetops off
  162.       if ($did(12).state) set %opbot on
  163.       else set %opbot off
  164.       if ($did(13).state) set %reopbot on
  165.       else set %reopbot off
  166.       if ($did(14).state) set %botdeop on
  167.       else set %botdeop off
  168.       if ($did(15).state) set %botautopass on
  169.       else set %botautopass off
  170.       if ($did(21).state) set %notify on
  171.       else set %notify off
  172.       if ($did(22).state) set %ntwhs on
  173.       else set %ntwhs off
  174.       if ($did(23).state) set %inotify on
  175.       else set %inotify off
  176.       if ($did(24).state) set %nsukn on
  177.       else set %nsukn off
  178.       if ($did(31).state) set %userbans on
  179.       else set %userbans off
  180.       if ($did(32).state) set %showchans on
  181.       else set %showchans off
  182.       if ($did(41).state) set %info on
  183.       else set %info off
  184.       if ($did(43).text) set %lb $did(43)
  185.       else unset %lb
  186.       if ($did(45).text) set %rb $did(45)
  187.       else unset %rb
  188.       if ($did(51).state) set %strictops on
  189.       else set %strictops off
  190.       if ($did(53).text) set %strictchans $did(53)
  191.       else set %strictchans none
  192.       if ($did(54).state) set %protdeop on
  193.       else set %protdeop off
  194.       did -b $dname 3
  195.     }
  196.     else usersettings.update
  197.   }
  198.   elseif ($devent == edit) usersettings.update
  199. }
  200. alias -l usersettings.update {
  201.   if ($did(21).state) {
  202.     did -e $dname 20
  203.     did -e $dname 22
  204.     did -e $dname 23
  205.     did -e $dname 24
  206.   }
  207.   else {
  208.     did -b $dname 20
  209.     did -b $dname 22
  210.     did -b $dname 23
  211.     did -b $dname 24
  212.   }
  213.   if ($did(41).state) {
  214.     did -e $dname 40
  215.     did -e $dname 42
  216.     did -e $dname 43
  217.     did -e $dname 44
  218.     did -e $dname 45
  219.   }
  220.   else {
  221.     did -b $dname 40
  222.     did -b $dname 42
  223.     did -b $dname 43
  224.     did -b $dname 44
  225.     did -b $dname 45
  226.   }
  227.   if ($did(51).state) {
  228.     did -e $dname 52
  229.     did -e $dname 53
  230.   }
  231.   else {
  232.     did -b $dname 52
  233.     did -b $dname 53
  234.   }
  235.   did -e $dname 3
  236. }
  237. on 1:DIALOG:ircN.awaysettings:*:* {
  238.   if ($devent == init) {
  239.     if (%msglog == on) did -c $dname 11
  240.     if (%pager == on) did -c $dname 12
  241.     if (%em == on) did -c $dname 13
  242.     if (%showuin == on) did -c $dname 14
  243.     if (%uin != $null) did -a $dname 15 %uin
  244.     if (%idlesave == on) did -c $dname 16
  245.     if (%autousedef == on) did -c $dname 17
  246.     if (%clsmsg == on) did -c $dname 18
  247.     if (%autoaway == on) did -c $dname 19
  248.     if (%away.chan != $null) did -a $dname 21 %away.chan
  249.     if (%announce == on) did -c $dname 31
  250.     if (%altnick1 != $null) did -a $dname 33 %altnick1
  251.     if (%altnick2 != $null) did -a $dname 34 %altnick2
  252.     if (%saytype == action) did -c $dname 36
  253.     elseif (%saytype == notice) did -c $dname 37
  254.     elseif (%saytype == channel) did -c $dname 38
  255.     else did -c $dname 37
  256.     awaysettings.update
  257.     did -b $dname 3
  258.   }
  259.   elseif ($devent == sclick) {
  260.     if ((($did == 1) && ($did(2).next == 3)) || ($did == 3)) {
  261.       did -b $dname 3
  262.       if (($did(11).state) && (%msglog == off)) msglog on
  263.       elseif (($did(11).state == 0) && (%msglog == on)) msglog off
  264.       if (($did(12).state) && (%pager == off)) pager on
  265.       elseif (($did(12).state == 0) && (%pager == on)) pager off
  266.       if ($did(13).state) set %em on
  267.       else set %em off
  268.       if ($did(14).state) set %showuin on
  269.       else set %showuin off
  270.       if ($did(15) != $null) set %uin $did(15)
  271.       else unset %uin
  272.       if ($did(16).state) set %idlesave on
  273.       else set %idlesave off
  274.       if ($did(17).state) set %autousedef on
  275.       else set %autousedef off
  276.       if ($did(18).state) set %clsmsg on
  277.       else set %clsmsg off
  278.       if (($did(19).state) && (%autoaway == off)) autoaway on
  279.       elseif (($did(19).state == 0) && (%autoaway == on)) autoaway off
  280.       if ($did(21) != $null) set %away.chan $did(21)
  281.       else unset %away.chan
  282.       if ($did(31).state) set %announce on
  283.       else set %announce off
  284.       if ($did(33) != $null) set %altnick1 $did(33)
  285.       else unset %altnick1
  286.       if ($did(34) != $null) set %altnick2 $did(34)
  287.       else unset %altnick2
  288.       if ($did(36).state) set %saytype action
  289.       elseif ($did(37).state) set %saytype notice
  290.       elseif ($did(38).state) set %saytype channel
  291.       else set %saytype notice
  292.     }
  293.     else awaysettings.update
  294.   }
  295.   elseif ($devent == edit) did -e $dname 3
  296. }
  297. alias -l awaysettings.update {
  298.   if ($did(14).state) did -e $dname 15
  299.   else did -b $dname 15
  300.   if ($did(31).state) {
  301.     did -e $dname 30
  302.     did -e $dname 32
  303.     did -e $dname 33
  304.     did -e $dname 34
  305.     did -e $dname 35
  306.     did -e $dname 36
  307.     did -e $dname 37
  308.     did -e $dname 38
  309.   }
  310.   else {
  311.     did -b $dname 30
  312.     did -b $dname 32
  313.     did -b $dname 33
  314.     did -b $dname 34
  315.     did -b $dname 35
  316.     did -b $dname 36
  317.     did -b $dname 37
  318.     did -b $dname 38
  319.   }
  320.   did -e $dname 3
  321. }
  322. on 1:DIALOG:ircN.miscsettings:*:* {
  323.   if ($devent == init) {
  324.     if (%playsnds == on) did -c $dname 11
  325.     if (%copydns == on) did -c $dname 12
  326.     if (%rawreveal == on) did -c $dname 13
  327.     if (%sthemes == on) did -c $dname 14
  328.     if (%kickonban == on) did -c $dname 15
  329.     if (%colnick == on) did -c $dname 16
  330.     if (%netsplit == on) did -c $dname 17
  331.     if (%splash == on) did -c $dname 18
  332.     if (%autoping == on) did -c $dname 19
  333.     if (%lag != off) did -c $dname 21
  334.     if (%pongi != $null) did -a $dname 23 %pongi
  335.     else did -a $dname 23 1
  336.     if (%autocycle == on) did -c $dname 25
  337.     if (%autocycle.mode != $null) did -a $dname 26 %autocycle.mode
  338.     else did -a $dname 26 nt
  339.     if (%delogs == off) did -c $dname 61
  340.     elseif (%delogs == start) did -c $dname 62
  341.     elseif (%delogs == connect) did -c $dname 63
  342.     else did -c $dname 61
  343.     miscsettings.update
  344.     did -b $dname 3
  345.   }
  346.   elseif ($devent == sclick) {
  347.     if ((($did == 1) && ($did(2).next == 3)) || ($did == 3)) {
  348.       did -b $dname 3
  349.       if ($did(11).state) set %playsnds on
  350.       else set %playsnds off
  351.       if ($did(12).state) set %copydns on
  352.       else set %copydns off
  353.       if ($did(13).state) set %rawreveal on
  354.       else set %rawreveal off
  355.       if (($did(14).state) && (%sthemes == off)) stheme on
  356.       elseif (($did(14).state == 0) && (%sthemes == on)) stheme off
  357.       if ($did(15).state) set %kickonban on
  358.       else set %kickonban off
  359.       if (($did(16).state) && (%colnick == off)) colnick on
  360.       elseif (($did(16).state == 0) && (%colnick == on)) colnick off
  361.       if ($did(17).state) set %netsplit on
  362.       else set %netsplit off
  363.       if ($did(18).state) set %splash on
  364.       else set %splash off
  365.       if ($did(19).state) set %autoping on
  366.       else set %autoping off
  367.       if ($did(21).state) set %lag 0
  368.       else set %lag off
  369.       if ($did(23)) set %pongi $did(23)
  370.       else set %pongi 1
  371.       if ($did(25).state) set %autocycle on
  372.       else set %autocycle off
  373.       if ($did(26)) set %autocycle.mode $did(26)
  374.       else set %autocycle.mode nt
  375.       if ($did(61).state) set %delogs off
  376.       elseif ($did(62).state) set %delogs start
  377.       elseif ($did(63).state) set %delogs connect
  378.       else set %delogs off
  379.     }
  380.     else miscsettings.update
  381.   }
  382.   elseif ($devent == edit) did -e $dname 3
  383. }
  384. alias -l miscsettings.update {
  385.   if ($did(21).state) {
  386.     did -e $dname 22
  387.     did -e $dname 23
  388.     did -e $dname 24
  389.   }
  390.   else {
  391.     did -b $dname 22
  392.     did -b $dname 23
  393.     did -b $dname 24
  394.   }
  395.   if ($did(25).state) did -e $dname 26
  396.   else did -b $dname 26
  397.   did -e $dname 3
  398. }
  399. on 1:DIALOG:ircN.echosettings:*:* {
  400.   if ($devent == init) {
  401.     if (%idlewhois == on) did -c $dname 11
  402.     if (%whoiswin == on) did -c $dname 12
  403.     if (%wllp == on) did -c $dname 13
  404.     if (%snotice == on) did -c $dname 14
  405.     if (%userstatus == on) did -c $dname 15
  406.     if (%joinch == on) did -c $dname 21
  407.     if (%jointpc == on) did -c $dname 22
  408.     if (%jointtl == on) did -c $dname 23
  409.     if (%joinnms == on) did -c $dname 24
  410.     if (%joinsyn == on) did -c $dname 25
  411.     if (%jointst == on) did -c $dname 26
  412.     if (%clonescan == on) did -c $dname 31
  413.     if (%clonechannels != $null) did -a $dname 33 %clonechannels
  414.     else did -a $dname 33 none
  415.     if (%clopkick == on) did -c $dname 34
  416.     if (%clusrkick == on) did -c $dname 35
  417.     if (%clonelevel == 1) did -c $dname 37
  418.     elseif (%clonelevel == 2) did -c $dname 38
  419.     elseif (%clonelevel == 3) did -c $dname 39
  420.     elseif (%clonelevel == 4) did -c $dname 40
  421.     else did -c $dname 37
  422.     if (%clocktb == on) did -c $dname 51
  423.     if (%clock == chan) did -c $dname 53
  424.     elseif (%clock == echo) did -c $dname 54
  425.     elseif (%clock == off) did -c $dname 55
  426.     else did -c $dname 55
  427.     echosettings.update
  428.     did -b $dname 3
  429.   }
  430.   elseif ($devent == sclick) {
  431.     if ((($did == 1) && ($did(2).next == 3)) || ($did == 3)) {
  432.       did -b $dname 3
  433.       if ($did(11).state) set %idlewhois on
  434.       else set %idlewhois off
  435.       if ($did(12).state) set %whoiswin on
  436.       else set %whoiswin off
  437.       if ($did(13).state) set %wllp on
  438.       else set %wllp off
  439.       if ($did(14).state) set %snotice on
  440.       else set %snotice off
  441.       if ($did(15).state) set %userstatus on
  442.       else set %userstatus off
  443.       if ($did(21).state) set %joinch on
  444.       else set %joinch off
  445.       if ($did(22).state) set %jointpc on
  446.       else set %jointpc off
  447.       if ($did(23).state) set %jointtl on
  448.       else set %jointtl off
  449.       if ($did(24).state) set %joinnms on
  450.       else set %joinnms off
  451.       if ($did(25).state) set %joinsyn on
  452.       else set %joinsyn off
  453.       if ($did(26).state) set %jointst on
  454.       else set %jointst off
  455.       if ($did(31).state) set %clonescan on
  456.       else set %clonescan off
  457.       if ($did(33)) set %clonechannels $did(33)
  458.       else set %clonechannels none
  459.       if ($did(34).state) set %clopkick on
  460.       else set %clopkick off
  461.       if ($did(35).state) set %clusrkick on
  462.       else set %clusrkick off
  463.       if ($did(37).state) set %clonelevel 1
  464.       elseif ($did(38).state) set %clonelevel 2
  465.       elseif ($did(39).state) set %clonelevel 3
  466.       elseif ($did(40).state) set %clonelevel 4
  467.       else set %clonelevel 1
  468.       if ($did(51).state) set %clocktb on
  469.       else set %clocktb off
  470.       if ($did(53).state) set %clock chan
  471.       elseif ($did(54).state) set %clock echo
  472.       elseif ($did(55).state) set %clock off
  473.       else set %clock off
  474.     }
  475.     else echosettings.update
  476.   }
  477.   elseif ($devent == edit) did -e $dname 3
  478. }
  479. alias -l echosettings.update {
  480.   if ($did(21).state) {
  481.     did -e $dname 20
  482.     did -e $dname 22
  483.     did -e $dname 23
  484.     did -e $dname 24
  485.     did -e $dname 25
  486.     did -e $dname 26
  487.   }
  488.   else {
  489.     did -b $dname 20
  490.     did -b $dname 22
  491.     did -b $dname 23
  492.     did -b $dname 24
  493.     did -b $dname 25
  494.     did -b $dname 26
  495.   }
  496.   if ($did(31).state) {
  497.     did -e $dname 30
  498.     did -e $dname 32
  499.     did -e $dname 33
  500.     did -e $dname 34
  501.     did -e $dname 35
  502.     did -e $dname 36
  503.     did -e $dname 37
  504.     did -e $dname 38
  505.     did -e $dname 39
  506.     did -e $dname 40
  507.   }
  508.   else {
  509.     did -b $dname 30
  510.     did -b $dname 32
  511.     did -b $dname 33
  512.     did -b $dname 34
  513.     did -b $dname 35
  514.     did -b $dname 36
  515.     did -b $dname 37
  516.     did -b $dname 38
  517.     did -b $dname 39
  518.     did -b $dname 40
  519.   }
  520.   did -e $dname 3
  521. }
  522. on 1:DIALOG:ircN.themesettings:*:* {
  523.   if ($devent == init) {
  524.     if (%theme == on) did -c $dname 4
  525.     if (%theme.fileget == on) did -c $dname 11
  526.     if (%theme.filesent == on) did -c $dname 12
  527.     if (%theme.dccchat == on) did -c $dname 13
  528.     if (%theme.dccsend == on) did -c $dname 14
  529.     if (%theme.nomsg == on) did -c $dname 21
  530.     if (%theme.gotmsg == on) did -c $dname 22
  531.     if (%theme.seemsg == on) did -c $dname 23
  532.     if (%theme.delmsg == on) did -c $dname 24
  533.     if (%theme.msg == on) did -c $dname 31
  534.     if (%theme.notice == on) did -c $dname 32
  535.     if (%theme.page == on) did -c $dname 33
  536.     if (%theme.welcome == on) did -c $dname 41
  537.     if (%theme.connect == on) did -c $dname 42
  538.     if (%theme.disconnect == on) did -c $dname 43
  539.     if (%theme.split == on) did -c $dname 51
  540.     if (%theme.kicked == on) did -c $dname 52
  541.     if (%theme.nick == on) did -c $dname 53
  542.     if (%theme.topic == on) did -c $dname 54
  543.     if (%theme.away == on) did -c $dname 55
  544.     if (%theme.back == on) did -c $dname 56
  545.     if (%theme.flood == on) did -c $dname 57
  546.     if (%theme.invite == on) did -c $dname 58
  547.     if (%theme.rejoin == on) did -c $dname 59
  548.     themesettings.update
  549.     did -b $dname 3
  550.   }
  551.   elseif ($devent == sclick) {
  552.     if ((($did == 1) && ($did(2).next == 3)) || ($did == 3)) {
  553.       did -b $dname 3
  554.       if (($did(4).state) && (%theme == off)) themes on
  555.       elseif (($did(4).state == 0) && (%theme == on)) themes off
  556.       if ($did(11).state) set %theme.fileget on
  557.       else set %theme.fileget off
  558.       if ($did(12).state) set %theme.filesent on
  559.       else set %theme.filesent off
  560.       if ($did(13).state) set %theme.dccchat on
  561.       else set %theme.dccchat off
  562.       if ($did(14).state) set %theme.dccsend on
  563.       else set %theme.dccsend off
  564.       if ($did(21).state) set %theme.nomsg on
  565.       else set %theme.nomsg off
  566.       if ($did(22).state) set %theme.gotmsg on
  567.       else set %theme.gotmsg off
  568.       if ($did(23).state) set %theme.seemsg on
  569.       else set %theme.seemsg off
  570.       if ($did(24).state) set %theme.delmsg on
  571.       else set %theme.delmsg off
  572.       if ($did(31).state) set %theme.msg on
  573.       else set %theme.msg off
  574.       if ($did(32).state) set %theme.notice on
  575.       else set %theme.notice off
  576.       if ($did(33).state) set %theme.page on
  577.       else set %theme.page off
  578.       if ($did(41).state) set %theme.welcome on
  579.       else set %theme.welcome off
  580.       if ($did(42).state) set %theme.connect on
  581.       else set %theme.connect off
  582.       if ($did(43).state) set %theme.disconnect on
  583.       else set %theme.disconnect off
  584.       if ($did(51).state) set %theme.split on
  585.       else set %theme.split off
  586.       if ($did(52).state) set %theme.kicked on
  587.       else set %theme.kicked off
  588.       if ($did(53).state) set %theme.nick on
  589.       else set %theme.nick off
  590.       if ($did(54).state) set %theme.topic on
  591.       else set %theme.topic off
  592.       if ($did(55).state) set %theme.away on
  593.       else set %theme.away off
  594.       if ($did(56).state) set %theme.back on
  595.       else set %theme.back off
  596.       if ($did(57).state) set %theme.flood on
  597.       else set %theme.flood off
  598.       if ($did(58).state) set %theme.invite on
  599.       else set %theme.invite off
  600.       if ($did(59).state) set %theme.rejoin on
  601.       else set %theme.rejoin off
  602.     }
  603.     else themesettings.update
  604.   }
  605. }
  606. alias -l themesettings.update {
  607.   if ($did(4).state) {
  608.     did -e $dname 10
  609.     did -e $dname 11
  610.     did -e $dname 12
  611.     did -e $dname 13
  612.     did -e $dname 14
  613.     did -e $dname 20
  614.     did -e $dname 21
  615.     did -e $dname 22
  616.     did -e $dname 23
  617.     did -e $dname 24
  618.     did -e $dname 30
  619.     did -e $dname 31
  620.     did -e $dname 32
  621.     did -e $dname 33
  622.     did -e $dname 40
  623.     did -e $dname 41
  624.     did -e $dname 42
  625.     did -e $dname 43
  626.     did -e $dname 50
  627.     did -e $dname 51
  628.     did -e $dname 52
  629.     did -e $dname 53
  630.     did -e $dname 54
  631.     did -e $dname 55
  632.     did -e $dname 56
  633.     did -e $dname 57
  634.     did -e $dname 58
  635.     did -e $dname 59
  636.   }
  637.   else {
  638.     did -b $dname 10
  639.     did -b $dname 11
  640.     did -b $dname 12
  641.     did -b $dname 13
  642.     did -b $dname 14
  643.     did -b $dname 20
  644.     did -b $dname 21
  645.     did -b $dname 22
  646.     did -b $dname 23
  647.     did -b $dname 24
  648.     did -b $dname 30
  649.     did -b $dname 31
  650.     did -b $dname 32
  651.     did -b $dname 33
  652.     did -b $dname 40
  653.     did -b $dname 41
  654.     did -b $dname 42
  655.     did -b $dname 43
  656.     did -b $dname 50
  657.     did -b $dname 51
  658.     did -b $dname 52
  659.     did -b $dname 53
  660.     did -b $dname 54
  661.     did -b $dname 55
  662.     did -b $dname 56
  663.     did -b $dname 57
  664.     did -b $dname 58
  665.     did -b $dname 59
  666.   }
  667.   did -e $dname 3
  668. }
  669. on 1:DIALOG:ircN.setupsettings:*:* {
  670.   if ($devent == init) {
  671.     if (%idle != $null) did -a $dname 12 $div(%idle,60)
  672.     else did -a $dname 12 10
  673.     if (%awaycmd != $null) did -a $dname 15 %awaycmd
  674.     else did -a $dname 15 /away
  675.     if (%im != $null) did -a $dname 17 %im
  676.     else did -a $dname 17 .
  677.     if (%it != $null) did -a $dname 19 $div(%it,60)
  678.     else did -a $dname 19 1
  679.     if (%idcheck == on) did -c $dname 31
  680.     if (%idauto == on) did -c $dname 32
  681.     if (%idlemax != $null) did -a $dname 34 $div(%idlemax,60)
  682.     else did -a $dname 34 1
  683.     if (%idchan != $null) did -a $dname 37 %idchan
  684.     else did -a $dname 37 none
  685.     if (%idtog == on) did -c $dname 38
  686.     if (%idphrase != $null) did -a $dname 40 %idphrase
  687.     else did -a $dname 40 .
  688.     if (%nc == on) did -c $dname 51
  689.     if (%nlb != $null) did -a $dname 53 %nlb
  690.     if (%nrb != $null) did -a $dname 55 %nrb
  691.     if (%nch != $null) did -a $dname 57 %nch
  692.     else did -a $dname 57 :
  693.     if (%sthemes == on) {
  694.       set %i 0
  695.       :ncstyle
  696.       inc %i
  697.       if ($gettok($form(nickcomp,styles),%i,44)) {
  698.         did -a $dname 59 $gettok($form(nickcomp,styles),%i,44)
  699.         goto ncstyle
  700.       }
  701.       did -a $dname 59 random
  702.       if (%ncstyle == random) did -c $dname 59 $did(59).lines
  703.       else did -c $dname 59 $findtok($form(nickcomp,styles),%ncstyle,1,44)
  704.     }
  705.     if (%shitkick != $null) did -a $dname 62 %shitkick
  706.     else did -a $dname 62 lewser
  707.     if (%idreason != $null) did -a $dname 64 %idreason
  708.     else did -a $dname 64 anti-idles suck
  709.     if (%ckb != $null) did -a $dname 66 %ckb
  710.     else did -a $dname 66 invites are lame
  711.     if (%msk != $null) did -a $dname 68 %msk
  712.     else did -a $dname 68 mass kick
  713.     if (%bankick != $null) did -a $dname 70 %bankick
  714.     else did -a $dname 70 don't ban me
  715.     if (%defaulta != $null) did -a $dname 82 %defaulta
  716.     if (%dback != $null) did -a $dname 84 %dback
  717.     if (%defaultt != $null) did -a $dname 92 %defaultt
  718.     if (%wall != $null) did -a $dname 94 %wall
  719.     else did -a $dname 94 WallOP
  720.     if (%voice != $null) did -a $dname 96 %voice
  721.     else did -a $dname 96 voice
  722.     if (%nonops != $null) did -a $dname 98 %nonops
  723.     else did -a $dname 98 nonops
  724.     if (%modesonline != $null) did -a $dname 100 %modesonline
  725.     else did -a $dname 100 3
  726.     if (%tz != $null) did -a $dname 112 %tz
  727.     if (%umode != $null) did -a $dname 114 %umode
  728.     else did -a $dname 114 +i
  729.     if (%showword == on) did -c $dname 115
  730.     if (%shortnick != $null) did -a $dname 116 %shortnick
  731.     if (%shownick == on) did -c $dname 117
  732.     if (%irc2.nick != $null) did -a $dname 123 %irc2.nick
  733.     else did -a $dname 123 $readini $mircini mirc nick
  734.     if (%irc2.altnick != $null) did -a $dname 125 %irc2.altnick
  735.     else did -a $dname 125 $readini $mircini mirc anick
  736.     if (%irc2.rejoin == on) did -c $dname 126
  737.     if (%def.tel.port != $null) did -a $dname 139 %def.tel.port
  738.     else did -a $dname 139 23
  739.     if (%def.tel.echo == on) did -c $dname 140
  740.     setupsettings.update
  741.     did -b $dname 3
  742.   }
  743.   elseif ($devent == sclick) {
  744.     if ((($did == 1) && ($did(2).next == 3)) || ($did == 3)) {
  745.       did -b $dname 3
  746.       if ($did(12)) set %idle $mpy($did(12),60)
  747.       else set %idle 600
  748.       if ($did(15)) set %awaycmd $did(15)
  749.       else set %awaycmd /away
  750.       if ($did(17)) set %im $did(17)
  751.       else set %im .
  752.       if ($did(19)) set %it $mpy($did(19),60)
  753.       else set %it 60
  754.       if (($did(31).state) && (%idcheck == off)) idlechk on
  755.       elseif (($did(31).state == 0) && (%idcheck == on)) idlechk off
  756.       if ($did(32).state) {
  757.         set %idauto on
  758.         .timer 0 300 idchk
  759.         set %idchktimer $ltimer
  760.       }
  761.       else {
  762.         set %idauto off
  763.         timoff %idchktimer idchktimer
  764.       }
  765.       if ($did(34)) set %idlemax $mpy($did(34),60)
  766.       else set %idlemax 3600
  767.       if ($did(37)) set %idchan $did(37)
  768.       else set %idchan none
  769.       if ($did(38).state) set %idtog on
  770.       else set %idtog off
  771.       if ($did(40)) set %idphrase $did(40)
  772.       else set %idphrase .
  773.       if ($did(51).state) set %nc on
  774.       else set %nc off
  775.       if ($did(53)) set %nlb $did(53)
  776.       else unset %nlb
  777.       if ($did(55)) set %nrb $did(55)
  778.       else unset %nrb
  779.       if ($did(57)) set %nch $did(57)
  780.       else set %nch :
  781.       if (%sthemes == on) set %ncstyle $did(59,$did(59).sel)
  782.       if ($did(62)) set %shitkick $did(62)
  783.       else set %shitkick lewser
  784.       if ($did(64)) set %idreason $did(64)
  785.       else set %idreason anti-idles suck
  786.       if ($did(66)) set %ckb $did(66)
  787.       else set %ckb invites are lame
  788.       if ($did(68)) set %msk $did(68)
  789.       else set %msk mass kick
  790.       if ($did(70)) set %bankick $did(70)
  791.       else set %bankick don't ban me
  792.       if ($did(82)) set %defaulta $did(82)
  793.       else unset %defaulta
  794.       if ($did(84)) set %dback $did(84)
  795.       else unset %dback
  796.       if ($did(92)) set %defaultt $did(92)
  797.       else unset %defaultt
  798.       if ($did(94)) set %wall $did(94)
  799.       else set %wall WallOP
  800.       if ($did(96)) set %voice $did(96)
  801.       else set %voice voice
  802.       if ($did(98)) set %nonops $did(98)
  803.       else set %nonops nonops
  804.       if ($did(100)) set %modesonline $did(100)
  805.       else set %modesonline 3
  806.       if ($did(112)) set %tz $did(112)
  807.       else unset %tz
  808.       if ($did(114)) set %umode $did(114)
  809.       else set %umode +i
  810.       if ($did(115).state) set %showword on
  811.       else set %showword off
  812.       if ($did(116)) set %shortnick $did(116)
  813.       else unset %shortnick
  814.       if ($did(117).state) set %shownick on
  815.       else set %shownick off
  816.       if ($did(123)) set %irc2.nick $did(123)
  817.       else set %irc2.nick $readini $mircini mirc nick
  818.       if ($did(125)) set %irc2.altnick $did(125)
  819.       else set %irc2.altnick $readini $mircini mirc anick
  820.       if ($did(126).state) set %irc2.rejoin on
  821.       else set %irc2.rejoin off
  822.       if ($did(139)) set %def.tel.port $did(139)
  823.       else set %def.tel.port 23 
  824.       if ($did(140).state) set %def.tel.echo on
  825.       else set %def.tel.echo off
  826.     }
  827.     elseif ($did == 86) .timer 1 0 set %sound $$ $+ dir="Select pager sound." $wavdir(*.wav)
  828.     elseif ($did == 128) .timer 1 0 setpop
  829.     elseif ($did == 129) .timer 1 0 setsmtp
  830.     elseif ($did == 141) .timer 1 0 set %def.tel.exe $$ $+ dir="Enter telnet application for vt100 emulation" c:\windows\*.exe $ $+ ?="Parameters? (cancel for none)"
  831.     else setupsettings.update
  832.   }
  833.   elseif ($devent == edit) setupsettings.update
  834. }
  835. alias -l setupsettings.update {
  836.   if ($did(31).state) {
  837.     did -e $dname 30
  838.     did -e $dname 32
  839.     if ($did(32).state) {
  840.       did -e $dname 33
  841.       did -e $dname 34
  842.       did -e $dname 35
  843.     }
  844.     else {
  845.       did -b $dname 33
  846.       did -b $dname 34
  847.       did -b $dname 35
  848.     }
  849.     did -e $dname 36
  850.     did -e $dname 37
  851.     did -e $dname 38
  852.     if ($did(38).state) {
  853.       did -e $dname 39
  854.       did -e $dname 40
  855.     }
  856.     else {
  857.       did -b $dname 39
  858.       did -b $dname 40
  859.     }
  860.   }
  861.   else {
  862.     did -b $dname 30
  863.     did -bu $dname 32
  864.     did -b $dname 33
  865.     did -b $dname 34
  866.     did -b $dname 35
  867.     did -b $dname 36
  868.     did -b $dname 37
  869.     did -bu $dname 38
  870.     did -b $dname 39
  871.     did -b $dname 40
  872.   }
  873.   if ($did(51).state) {
  874.     did -e $dname 50
  875.     did -e $dname 52
  876.     did -e $dname 53
  877.     did -e $dname 54
  878.     did -e $dname 55
  879.     did -e $dname 56
  880.     did -e $dname 57
  881.     if (%sthemes == on) {
  882.       did -e $dname 58
  883.       did -e $dname 59
  884.     }
  885.     else {
  886.       did -b $dname 58
  887.       did -bu $dname 59
  888.     }
  889.   }
  890.   else {
  891.     did -b $dname 50
  892.     did -b $dname 52
  893.     did -b $dname 53
  894.     did -b $dname 54
  895.     did -b $dname 55
  896.     did -b $dname 56
  897.     did -b $dname 57
  898.     did -b $dname 58
  899.     did -b $dname 59
  900.   }
  901.   if ($did(115).state) did -e $dname 116
  902.   else did -b $dname 116
  903.   did -e $dname 3
  904. }
  905.